home *** CD-ROM | disk | FTP | other *** search
/ Aminet 23 / Aminet 23 (1998)(GTI - Schatztruhe)[!][Feb 1998].iso / Aminet / dev / amos / AMOS1097.lzh / AMOSLIST / 000029_amos-request@svcs1.digex.net_Thu Oct 2 22:42:58 1997.msg < prev    next >
Internet Message Format  |  1997-11-02  |  3KB
  1. Received: from svcs1.digex.net (svcs1.digex.net [204.91.197.224])
  2.     by mail2.access.digex.net (8.8.5/8.8.5) with ESMTP id WAA20082
  3.     for <mcox@access.digex.net>; Thu, 2 Oct 1997 22:42:55 -0400 (EDT)
  4. Received: (from daemon@localhost)
  5.     by svcs1.digex.net (8.8.5/8.8.5) id TAA02130
  6.     for amos-out; Thu, 2 Oct 1997 19:48:01 -0400 (EDT)
  7. Received: from mail4.access.digex.net (mail4.access.digex.net [205.197.247.2])
  8.     by svcs1.digex.net (8.8.5/8.8.5) with ESMTP id TAA02127
  9.     for <amos-list@svcs1.digex.net>; Thu, 2 Oct 1997 19:48:00 -0400 (EDT)
  10. Received: from punt-1.mail.demon.net (punt-1a.mail.demon.net [194.217.242.134])
  11.     by mail4.access.digex.net (8.8.5/8.8.5) with SMTP id TAA22673
  12.     for <amos-list@access.digex.net>; Thu, 2 Oct 1997 19:47:58 -0400 (EDT)
  13. Received: from agasinc.demon.co.uk ([193.237.4.98]) by punt-1.mail.demon.net
  14.            id ac1107735; 3 Oct 97 0:24 BST
  15. From: Andy Gibson <andy@agasinc.demon.co.uk>
  16. To: mtl.wberg@swipnet.se
  17. CC: Amos List <amos-list@access.digex.net>
  18. Date: Thu, 02 Oct 1997 00:22:02 -0000
  19. Message-ID: <yam7214.111.2289216@post.demon.co.uk>
  20. In-Reply-To: <3432ADAE.5DD4@swipnet.se>
  21. X-Mailer: YAM 1.3.4 [020] - Amiga Mailer by Marcel Beck
  22. Organization: AGAS Productions
  23. Subject: Re: need help
  24. MIME-Version: 1.0
  25. Content-Type: text/plain; charset=iso-8859-1
  26. Content-Transfer-Encoding: 8bit
  27. X-MIME-Autoconverted: from quoted-printable to 8bit by svcs1.digex.net id TAA02128
  28. Status: O
  29. X-Status: 
  30.  
  31. On 01-Oct-97, mtl.wberg@swipnet.se wrote:
  32. >Is it possible to make amos 2 change lines with another assii value than
  33. >then MS-DOS chr$(13)?
  34.  
  35. Sure is...
  36.  
  37. >When i read a text file without that i will recive an error mezz
  38. >(input to long), 
  39. >Ex
  40. >open in 1,a$
  41. >repeat
  42. >input #1,b$
  43. >until pof(1)=lof(1)
  44.  
  45. Nah! You don't wanna do it like that!
  46.  
  47. F$="yourtextfilepath"
  48. BNK=10 : Rem Any Bank
  49. Open in 1,F$
  50. L=Lof(1)
  51. Close 1
  52. Reserve As Data BNK,L
  53. Bload F$,Start(BNK)
  54.  
  55. ST=Start(BNK)
  56.  
  57. Do
  58.   Exit If ST=>Length(BNK) : Rem I think this may be wrong!!!
  59.   A$=Peek$(ST,79,Chr$(10)) : Rem 79 chars and Chr$(10) checked.
  60.   Add ST,Len(A$)+1
  61.   Print A$
  62. Loop
  63.  
  64. The  above  is  just  from  my  memory, so it may not be 100%! You can
  65. change the Chr$(10) to Chr$(13) if reading MS-DOS files.
  66.  
  67. If  that's  not  what  your after, I'm sure that the LDos Ext has some
  68. commands to change the EOL character search.
  69.  
  70. eg.
  71.  
  72. Lset Eoln 13 : Rem MS-DOS check
  73.  
  74. or
  75.  
  76. Lset Eoln 10 : Rem Amiga-DOS check
  77.  
  78. Check out the LDos dox for more great string handling....
  79.  
  80. Hope this has helped :)
  81.  
  82. Andy Gee!
  83.  
  84. -- 
  85.      _             _        _         _
  86.     _)\        ____)\      _)\   _____)\   #cONTACT mE fOR mORE iNFO#
  87.    /o� \      /o�____)    /o� \ /o�_____)  #oN aREA51 rELEASES aLSO.#
  88.   //    \    // /  __    //    \\\ \____ 
  89.  /.  O   \  /. /___\ \  /.  O   \\____  \  *andy@agasinc.demon.co.uk*
  90. /    _    \/   Y   Y  \/    _    \ ___\\ \
  91. \ __/ \___/\_________ /\___/ \ __//______/        Team *AMOS*
  92.  Y                   Y        Y   Y      
  93. L8R                  :        ï¿½   ï¿½            #cOMING sOON'ish#
  94.  .     Andy Gibson (AGAS Productons)           *Roswell Gfx Adv*
  95.  ï¿½         -=<(aka SKiDZ/A51)>=-                      9T7
  96.